home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Game Zone - 1,000+ Games
/
GAMEZONE.BIN
/
Programs
/
Win
/
5-CARD POKER COLLECTION
/
32stud12.exe
/
STUDPOK.EXE
/
0
/
RCDATA
/
TFORM4
/
TFORM4.txt
< prev
Wrap
Text File
|
1998-06-11
|
5KB
|
195 lines
object Form4: TForm4
Left = 251
Top = 141
HelpContext = 41003
HorzScrollBar.Visible = False
VertScrollBar.Visible = False
BorderStyle = bsSingle
Caption = 'Fast-Action Hold '#39'Em'
ClientHeight = 354
ClientWidth = 632
Color = clGreen
Font.Color = clBlack
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
Icon.Data = {<image000.ico>}
Menu = MainMenu1
Position = poScreenCenter
OnCreate = FormCreate
OnMouseUp = FormMouseUp
OnPaint = FormPaint
OnResize = FormResize
PixelsPerInch = 96
TextHeight = 16
object Panel1: TPanel
Left = 0
Top = 330
Width = 632
Height = 24
Align = alBottom
BevelOuter = bvLowered
TabOrder = 0
object Panel4: TPanel
Left = 0
Top = 1
Width = 198
Height = 24
BevelOuter = bvLowered
Caption = 'Fast-Action Hold '#39'Em'
TabOrder = 0
end
object Panel2: TPanel
Left = 200
Top = 1
Width = 144
Height = 24
BevelOuter = bvLowered
Caption = 'Credits:'
TabOrder = 1
end
object Panel3: TPanel
Left = 346
Top = 1
Width = 144
Height = 24
BevelOuter = bvLowered
Caption = 'Borrowed:'
TabOrder = 2
end
object Panel5: TPanel
Left = 490
Top = 1
Width = 142
Height = 24
BevelOuter = bvLowered
Caption = 'Current Bet:'
TabOrder = 3
end
end
object BitBtn1: TBitBtn
Left = 384
Top = 252
Width = 97
Height = 65
HelpContext = 41003
Caption = '&Ante Up'
Default = True
TabOrder = 1
OnClick = BitBtn1Click
Glyph.Data = {
96010000424D9601000000000000760000002800000018000000180000000100
04000000000020010000CE0E0000C40E00000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00222222222000
00222222222222222200CCCCFFFF0222222222222FFFCCCCFFFFFC0222222220
FFFFCCCCFFFFCCC02222222CFFFFFCCCFFFFCCCC022222CCCFFFFC4444FFCCCF
F02220CCCCFF44444444CCFFFF222CCCCCC4444444444FFFFF020FCCCC444444
44444FFFFCC20FFFCC444FF444F444CCCCC2FFFFF444F4FF44F444CCCCC0FFFF
F4444FF444F444CCCCC0CCCCC444FFF444F444FFFFF0CCCCC444F4F44FF444FF
FFF0CCCCCC444FF444F444FFFFF00CCFFF44444444444CCCFFF20FFFFFF44444
4444CCCCCC022FFFFFCCC444444FFCCCCC0220FFFCCCCFFFCCCFFFCCCC22220F
CCCCCFFFCCCFFFFCC2222220CCCCFFFFCCCFFFFF022222220CCCFFFFCCCCFFF2
2222222220CFFFFFCCCCF0222222222222200FFFCC0022222222}
Layout = blGlyphTop
end
object BitBtn3: TBitBtn
Left = 496
Top = 252
Width = 97
Height = 65
HelpContext = 41003
Cancel = True
Caption = 'E&xit'
ModalResult = 2
TabOrder = 2
Glyph.Data = {
4E010000424D4E01000000000000760000002800000011000000120000000100
040000000000D8000000CE0E0000C40E00000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00666666666666
6666600000006668866666666666600000006691186666698666600000006691
1186669118666000000066911118691111866000000066691111811111866000
0000666691111111186660000000666669111111866660000000666666111118
6666600000006666669111186666600000006666691111186666600000006666
9111811186666000000066691118691118666000000066691186669111866000
0000666691666669111660000000666666666666919660000000666666666666
666660000000666666666666666660000000}
Layout = blGlyphTop
end
object MainMenu1: TMainMenu
Left = 598
Top = 4
object File1: TMenuItem
Caption = '&File'
ShortCut = 0
object New1: TMenuItem
Caption = '&New'
ShortCut = 0
OnClick = New1Click
end
object N3: TMenuItem
Caption = '-'
ShortCut = 0
end
object Exit1: TMenuItem
Caption = 'E&xit'
ShortCut = 0
OnClick = Exit1Click
end
end
object Borrow1: TMenuItem
Caption = '&Borrow'
ShortCut = 0
OnClick = Borrow1Click
end
object Payoffs1: TMenuItem
Caption = '&Payoffs'
ShortCut = 0
OnClick = Payoffs1Click
end
object Register1: TMenuItem
Caption = '&Register'
ShortCut = 0
OnClick = Register1Click
end
object Help1: TMenuItem
Caption = '&Help'
ShortCut = 0
object Aboutthe5CardPokerCollection1: TMenuItem
Caption = '&About the 5-Card Poker Collection'
ShortCut = 0
OnClick = Aboutthe5CardPokerCollection1Click
end
object N1: TMenuItem
Caption = '-'
ShortCut = 0
end
object N5CardPokerCollectionManual1: TMenuItem
Caption = '5-Card Poker Collection &Manual'
ShortCut = 0
OnClick = N5CardPokerCollectionManual1Click
end
object N2: TMenuItem
Caption = '-'
ShortCut = 0
end
object FreeCD1: TMenuItem
Caption = '&Free CD'
ShortCut = 0
OnClick = FreeCD1Click
end
object UltisoftHomepage1: TMenuItem
Caption = 'Ultisoft &Homepage'
ShortCut = 0
OnClick = UltisoftHomepage1Click
end
object UltisoftProductCatalog1: TMenuItem
Caption = '&Ultisoft Product Catalog'
ShortCut = 0
OnClick = UltisoftProductCatalog1Click
end
end
end
end